CreateProgmanGroup "SoftKey CD Guide", "", cmoNone
ShowProgmanGroup "SoftKey CD Guide", 1, cmoNone
CreateProgmanItem "SoftKey CD Guide", "SoftKey CD Guide", "cdguide.exe", MakePath(DEST$,"cdguide.ico")+",0,0,0,"+GetSymbolValue("STF_SRCDIR"), cmoOverwrite
CloseLogFile
END SUB
'**
'** Purpose:
'** Appends a file name to the end of a directory path,
'** inserting a backslash character as needed.
'** Arguments:
'** szDir$ - full directory path (with optional ending "\")